object Form1: TForm1
  Left = 194
  Top = 146
  Width = 863
  Height = 581
  Caption = 'comtest'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDefaultPosOnly
  OnCreate = FormCreate
  DesignSize = (
    855
    554)
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 10
    Top = 90
    Width = 33
    Height = 13
    Caption = 'item_hi'
  end
  object Label2: TLabel
    Left = 230
    Top = 90
    Width = 33
    Height = 13
    Caption = 'item_lo'
  end
  object Label3: TLabel
    Left = 365
    Top = 90
    Width = 35
    Height = 13
    Caption = 'l3_data'
  end
  object Label4: TLabel
    Left = 60
    Top = 350
    Width = 43
    Height = 13
    Caption = 'response'
  end
  object IdLabel: TLabel
    Left = 10
    Top = 529
    Width = 228
    Height = 13
    Anchors = [akLeft, akBottom]
    Caption = '$Id: Unit1.dfm 89 2006-11-11 18:53:46Z alpov $'
  end
  object Label5: TLabel
    Left = 230
    Top = 210
    Width = 19
    Height = 13
    Caption = 'item'
  end
  object btnOpen: TButton
    Left = 679
    Top = 40
    Width = 75
    Height = 25
    Anchors = [akTop, akRight]
    Caption = 'open'
    TabOrder = 0
    OnClick = btnOpenClick
  end
  object txbData1: TEdit
    Left = 390
    Top = 135
    Width = 335
    Height = 21
    Anchors = [akLeft, akTop, akRight]
    MaxLength = 16
    TabOrder = 1
  end
  object btnSend: TButton
    Left = 744
    Top = 105
    Width = 101
    Height = 141
    Anchors = [akTop, akRight]
    Caption = 'send'
    TabOrder = 2
    OnClick = btnSendClick
  end
  object txbItemLo: TEdit
    Left = 230
    Top = 105
    Width = 121
    Height = 21
    TabOrder = 3
    Text = '0'
  end
  object btnClose: TButton
    Left = 769
    Top = 40
    Width = 75
    Height = 25
    Anchors = [akTop, akRight]
    Caption = 'close'
    Enabled = False
    TabOrder = 4
    OnClick = btnCloseClick
  end
  object chkData1: TRadioButton
    Left = 365
    Top = 140
    Width = 21
    Height = 17
    TabOrder = 5
  end
  object chkData2: TRadioButton
    Left = 365
    Top = 165
    Width = 21
    Height = 17
    TabOrder = 6
  end
  object txbData2: TEdit
    Left = 390
    Top = 165
    Width = 121
    Height = 21
    TabOrder = 7
    Text = '0'
  end
  object txbResponse: TMemo
    Left = 10
    Top = 255
    Width = 835
    Height = 260
    Anchors = [akLeft, akTop, akRight, akBottom]
    Font.Charset = EASTEUROPE_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'Courier New'
    Font.Style = []
    ParentFont = False
    ScrollBars = ssVertical
    TabOrder = 8
  end
  object rgpType: TRadioGroup
    Left = 390
    Top = 190
    Width = 166
    Height = 46
    Caption = ' typ '
    Columns = 3
    ItemIndex = 0
    Items.Strings = (
      'char'
      'int'
      'long')
    TabOrder = 9
  end
  object rgpCommand: TRadioGroup
    Left = 10
    Top = 5
    Width = 451
    Height = 71
    Caption = ' prikaz '
    Columns = 4
    ItemIndex = 0
    Items.Strings = (
      'RWDATA_W'
      'RWDATA_R'
      'STDATA_W'
      'DESC_W'
      'DESC_R'
      'LOG_R'
      'LOG_E (!!!)'
      'ONEWIRE_SCAN'
      'POWER_STATUS'
      'DEBUG')
    TabOrder = 10
    OnClick = rgpCommandClick
  end
  object lbxItemHi: TListBox
    Left = 10
    Top = 105
    Width = 211
    Height = 141
    ItemHeight = 13
    TabOrder = 11
  end
  object chkTXT: TCheckBox
    Left = 802
    Top = 520
    Width = 46
    Height = 17
    Anchors = [akRight, akBottom]
    Caption = 'TXT'
    TabOrder = 12
  end
  object chkData0: TRadioButton
    Left = 365
    Top = 110
    Width = 91
    Height = 17
    Caption = '  zadna data'
    Checked = True
    TabOrder = 13
    TabStop = True
  end
  object rgpDest: TRadioGroup
    Left = 470
    Top = 5
    Width = 136
    Height = 71
    Caption = ' cil '
    ItemIndex = 0
    Items.Strings = (
      'TERMINAL'
      'SERVER')
    TabOrder = 14
  end
  object txbItem: TEdit
    Left = 230
    Top = 225
    Width = 121
    Height = 21
    TabOrder = 15
    Text = '0'
  end
  object cmbComPort: TComboBox
    Left = 695
    Top = 10
    Width = 131
    Height = 21
    Anchors = [akTop, akRight]
    ItemHeight = 13
    TabOrder = 16
    Text = 'COM1'
    Items.Strings = (
      'COM1'
      'COM2'
      'COM3'
      'COM4'
      '\\.\COM10'
      '\\.\COM42'
      '\\.\COM51')
  end
  object Timer1: TTimer
    Interval = 100
    OnTimer = Timer1Timer
    Left = 565
    Top = 190
  end
end
